From: Kenichi Handa <handa@m17n.org>
Date: Wed, 15 Jan 2003 05:32:56 +0000 (+0000)
Subject: Setup the fontset "fontset-mac" correctly.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~28804
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=021c647c3756c34c2477443b71b8d0f7468efa48;p=emacs.git

Setup the fontset "fontset-mac" correctly.
---

diff --git a/lisp/term/mac-win.el b/lisp/term/mac-win.el
index 25c66103dd9..04989999db9 100644
--- a/lisp/term/mac-win.el
+++ b/lisp/term/mac-win.el
@@ -205,10 +205,10 @@ ascii:-*-Monaco-*-*-*-*-12-*-*-*-*-*-mac-roman")
 	 (function
 	  (lambda (key val)
 	    (or (generic-char-p key)
-		(memq (char-charset key)
+		(memq (char-charset val)
 		      '(ascii eight-bit-control eight-bit-graphic))
-		(set-fontset-font "fontset-mac" key monaco-font))))
-	 (get 'mac-roman-encoder 'translation-table)))))
+		(set-fontset-font "fontset-mac" val monaco-font))))
+	 (get 'mac-roman-decoder 'translation-table)))))
 
 (if (eq system-type 'darwin)
     ;; On Darwin filenames are encoded in UTF-8